home *** CD-ROM | disk | FTP | other *** search
/ Aminet 12 / Aminet 12 (1996)(GTI - Schatztruhe)[!][Jun 1996].iso / Aminet / biz / dbase / ADM30.lha / ADM / LogTel / LogTel.lha / Anwahl_mit_VoiceLog.adm next >
Text File  |  1995-07-04  |  2KB  |  52 lines
  1. /*      $VER: Anwahl_mit_VoiceLog.adm 1.5 (4.7.95)
  2.  
  3.         Log telephone calls.
  4.  
  5.         An ARexx-Script for use with ADM (AddressMaster, (c) Jan
  6.         Geissler) and Voice-Log (c) by Clemens Resanka in 1994
  7.  
  8.         1.0     Jul-94 [ClR] Initial release.
  9.  
  10.         1.1  09-Aug-94 [jan] Version String added.
  11.                              Removed addressing of ADM for use as
  12.                                ADM-Menu-Macro.
  13.                              Stored search path of voice log tool
  14.                                and of log file in var for easier
  15.                                adaption.
  16.                              Appending of string to log file
  17.                                 "optimized".
  18.                              Started dial tool before dialing number.
  19.  
  20.         1.2  25-Aug-94 [ClR] Optimized LogTel for use with Voice-Log 1.04
  21.  
  22.         1.3  18-Feb-95 [ClR] VoiceLog is closed, when number is not dialed
  23.                                 (e.g. because the modem is not on).
  24.                              Optimized output-algorithm: now "ECHO >>.." is used
  25.                                 and output is now done in one line (no more useless
  26.                                 variables).
  27.  
  28.         1.4  19-Feb-95 [ClR] Now this script needs VoiceLog V1.07! This version of
  29.                              Voice-Log does the logging instead of the script.
  30.                              Therfore using LogTel does no longer block ADM.
  31.  
  32.         1.5  02-Jul-95 [ClR] Now the script avoids sending Voice-Log a ""
  33.                              as a phone-number. Voice-Log 2.2 crashed then :-(
  34.                              Now the ADM variable .FULLNAME is used!
  35.  
  36. */
  37.  
  38.  
  39. OPTIONS RESULTS
  40.  
  41. ToolPath = "LogTel/Voice-Log"
  42. quote = '"'
  43.  
  44. GETADDRESS Stemmy
  45.  
  46. Nam = Stemmy.FULLNAME
  47. Tel = Stemmy.Telephone
  48. If Tel ~= "" then Tel = quote||Tel||quote
  49. IF Stemmy.SORT = 'COMPANY' THEN Nam = Stemmy.company
  50.  
  51. ADDRESS command 'run >NIL:' ToolPath quote||Nam||quote Tel
  52.